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SEQ 0001 


1 

2 

3 


.REM 1 


IDENTIFICATION 


PRODUCT CODE I AC-F416A-MC 


PRODUCT NAME! 
PRODUCT DATE! 
MAINTAINERI 


CXMNAA0 MNCAD (A/D) MODULE 
SEPTEMBER 1978 
DEC/Xll SUPPORT GROUP 


THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE 
WITHOUT NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT 
BY DIGITAL EQUIPMENT CORPORATION. DIGITAL EQUIPMENT 
CORPORATION ASSUMES NO RESPONSIBILITY FOR ANY ERRORS THAT 
MAY APPEAR IN THIS MANUAL. 


THE SOFTWARE described IN this DOCUMENT IS FURNISHED to the 
PURCHASER UNDER a LICENSE FOR USE ON A SINGLE COMPUTER 
SYSTEM AND CAN BE COPIED (WITH INCLUSION OF DIGITALS 
COPYRIGHT NOTICE) ONLY FOR USE IN SUCH SYSTEM, EXCEPT AS MAY 

otherwise be provided in writing by digital. 

DIGITAL EQUIPMENT CORPORATION ASSUMES NO RESPONSIBILITY FOR 
THE USE OR RELIABILITY OF ITS SOFTWARE ON EQUIPMENT THAT IS 
NOT SUPPLIED BY DIGITAL. 


COPYRIGHT (C) 1979,1979 DIGITAL EQUIPMENT CORPORATION 
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SEQ 0002 


1.0 ABSTRACT 


MNA IS AN IOMOD THAT EXERCISES THE MNCAD (A/D) ANALOG MODULE. THIS 
MODULE REQUIRES ONLY AN ANALOG GROUND ON CHANNEL 2ERO IN ORDER TO 
BE RUN, HOWEVER! WITH SPECIAL SETUP, MORE OPTIONS CAN BE CHOSEN. 

ONE OPTION IS THE USE OF THE MNCKW (REAL TIME CLOCK) DEVICE, 

THIS OPTION ALLOWS EXERCISING THE MNCAD ASYNCHRONOUSLY WITH THE 
LSI-11 CPU, THAT IS, MNCAD CONVERSIONS WILL BE STARTED AT RANDOM 
TIMES to allow for maximum bus noise during THE CONVERSION, if 
this OPTION IS SELECTED, YOU MUST DESELECT MNC FROM A DEC/Xll 
RUN AND ONLY ONE MNCAD (A/D) CAN BE RUN. 

WITH NORMAL OPERATION, RMS NOISE AND PEAK NOISE ARE SAMPLED 
ON CHANNEL EERO AND COMPARED AGAINST A LIMIT, WITH THE SECOND 
OPERATION OPTION, MORE CHANNELS MAY BE SPECIFIED TO RUN THE NOISE 
TESTS ON, THE THIRD OPTION ALLOWS FOP SAMPLING OF ONE TO ALL THE 
CHANNELS OF THE MNCAD. A CHECK IS MADE TO SEE THAT THE INPUT 
VOLTAGE REMAINS STABLE WITHIN AN ALLOWED TOLERANCE. LOCATIONS 
WITHIN THIS MODULE ARE PROVIDED TO CHANGE ANY LIMIT, OR TO FORCE 
TYPEOUT OF ANY VALUE. UP TO FOUR MNCAD (A/D) 'S CAN BE EXERCISED 
WITH THIS MODULE, WHEN SRl BITS 1 OR 2 ARE SET AND ADDITIONAL 
MNCAD'S ARE ENABLED, THE SAME NUMBER OF CHANNELS ON EACH MNCAD WILL BE 
TESTED. IF SRl BIT 0 IS SET, ONLY ONE MNCAD CAN BE BE TESTED, 


2.0 REQUIREMENTS 


HARDWARE! ONE MNCAD (A/D) 

ONE MNCKW (CLOCK) <OPTIONAL> 

STORAGE! MNA REQUIRES! 

DECIMAL WORDS! 901 
OCTAL WORDS! 1605 
OCTAL BYTES! 3412 


3.0 PASS DEFINITION 


ONE PASS OF THE MNA MODULE CONSISTS OF GENERATING 8 244 (DECIMAL ) 
INTERRUPTS (CONVERSIONS) . 


4.0 EXECUTION TIME 


ONE PASS OF THE MNA MODULE PUNNING ALONE WITH SRl * 0, 1 OR 2, WILL 
TAKE APPROXIMATELY ONE MINUTE. THE TIME FOR A PASS WITH SRl ■ 4 WILL 
depend UPON the number OF CHANNELS specified in LOCATION "NLSTCH” , 
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5.0 CONFIGURATION REQUIREMENTS 
DEFAULT PARAMETERS I 

DEVADR* 171000, VECTORS 400, BRls 4 
DEVCNTs 1, SRI I 0 
REQUIRED PARAMETERS* 

NONE IF SR 1 =0 

IF SRI BITS 0, 1 OR 2 b 1 THEN SEE OPERATION OPTIONS 
IF SRI BIT 0 IS SET, ONLY 1 MNCAD WILL BE TESTED. 

6.0 DEVICE/OPTION SETUP 

AN analog ground must be put on CH, 0 

(BY SET CH0 FRONT PANEL SWITCH TO "TEST"). 

SRI BIT0b1 USE THE MNCKW OPTION FOR A TO D STARTS 

(THE MNCKW <MNC> MODULE MUST BE DESELECTED) 

SRI BIT1>1 ALL CHANNELS SPECIFIED MUST HAVE 

AN ANALOG GROUND. 

SRI BIT2*1 SELECT ADDITIONAL CHANNELS FOR NOISE TESTING. 
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SEQ 0004 


m 



» t 


7,0 MODULE OPERATION 


1. (START) (RESTRT) INITLIZE POINTERS AND TYPE-OUT VALUES. 

2. (LOOP) BIT EXERCISE CSR 

3. (ADRMS1) PREFORM RMS NOISE CHECK ON SPECIFIED CHANNEL. 

WE FIRST USE SAP TO FIND THE DAC VALUE THAT PRODUCES A 16/84 
SPLIT FOR THE LEFT BOUNDARY OF NOISE. THEN WE USE SAR TO 

FIND THE DAC VALUE THAT PRODUCES A 84/16 SPLIT FOR THE RIGHT 
VALUE. WE THEN SUBTRACT THE TWO DAC VALUES AND WE HAVE A 
VALUE FOR THE 68% AREA OF NOISE (RMS). IT IS THEN COMARED 
AGAINST THE ALLOWED LIMIT TO SEE IF EXCESSIVE NOISE IS ON THE 

channel. 

4. (ADPK1) PREFORM PEAK NOISE CHECK ON SPECIFIED CHANNEL, 

WE FIRST USE SAR TO FIND THE DAC VALUE THAT PRODUCES A ,6% 
SPLIT FOR THE LEFT BOUNDARY OF NOISE. THEN WE USE SAR TO 

FIND THE DAC VALUE THAT PRODUCES A ,6% SPLIT FOR THE RIGHT 
BOUNDARY. WE THEN SUBTRACT THE TWO DAC VALUES AND WE HAVE A 
VALUE OF 98% AREA OF NOISE (PEAK). IT IS THEN COMPARED 
AGAINST THE ALLOWED LIMIT TO SEE IF EXCESSIVE NOISE IS ON THE 

channel. 

5. IF MULTIPLE CHANNELS ARE SELECTED FOR NOISE TESTING TEST NEXT 
CHANNEL, IF SINGULAR RETEST CHAN. 0, 

6. IF MULTI-CHANNEL SAMPLING IS SELECTED, TAKE SAMPLES ON EACH 
CHANNEL SPECIFIED, and COMPARE THE AVERAGE OF THE SAMPLES 
AGAINST the OLD AVERAGE FOR THE CHANNEL. IF THE DIFFERENCE 

is greater than the tolerance, report the data on that 

CHANNEL. 

7. REPORT END PASS IF LAST UNIT, BRANCH TO "LOOP" IF MORE UNITS. 

8. (SAR) SAR IS A SUCCESSIVE APPROXIMATION ROUTINE. IT IS USED 

TO FIND A DAC VALUE THAT PRODUCES A DESIRED SPLIT. IT DOES 
THIS BY TRYING A DAC VALUE AND TAKING 512 CONVERSIONS ON THE 
A/D. IF THE AMOUNT OF THE SAMPLES IS LOWER THEN SPECIFIED IT 
INCREASES THE DAC VALUE, IF THE AMOUNT OF SAMPLES IS HIGHER 
THEN SPECIFIED, IT DECREASES THE DAC VALUE. IF THE END DAC 
VALUE IS EITHER 000 OR 377 WE HAVE A "WARPAROUND" ERROR, 
THIS OCCURS WHEN WE ARE UNABLE TO ADJUST THE DAC TO PRODUCE A 
DESIRED SPLIT, AND INDICATES EXCESSIVE NOISE ON A CHANNEL. 

9. (RANDY) THIS IS A RANDOM NUMBER GENERATOR. IF THE MNCKW 

CLOCK OPTION IS SELECTED WE GET THE NUMBER THAT WE PUT INTO 

THE CLOCK PRESET REGISTER FROM THIS ROUTINE. 
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SEQ 0005 


8.0 OPERATION OPTIONS 


1. VALID SRI VALUES 

SRI BIT ENABLE/DISABLE FUNCTION 

0 0 INHIBIT USE OF MNCKW OPTION. 

0 1 ENABLE USE OF MNCKW OPTION. NOTES IF 

ENABLED, YOU MUST DESELECT "MNC FROM 
DEC/Xll RUN AND ONLY 1 MNCAD WILL BE RUN. 

1 0 INHIBIT SAMPLING ADDITIONAL CHANNELS 

FOR STABLE INPUT. 

1 1 ENABLE SAMPLING CHANNEL ZERO THROUGH 

CHANNEL SPECIFIED BY CLSTCH FOR STABLE 
INPUT (+-) TOLERANCE SPECIFIED BY OFFALL 

2 0 USE CHANNEL ZERO ONLY FOR NOISE TESTING. 

2 1 USE CHANNEL ZERO THROUGH THE CHANNEL 

SPECIFIED IN NLSTCH FOR NOISE TESTING. 

2. THE FOLLOWING ARE LOCATIONS WITHIN THIS MODULE THAT ENABLE 
THE USER TO CHANGE LIMITS AND SPECIFY CHANNELS, 

LOCATION FUNCTION 

ARMLIM SPECIFIES MAXIMUM LIMIT FOR RMS NOISE, MAY 

BE CHANGED TO ZERO TO FORCE TYPEOUT OF RMS 
NOISE ON A CHANNEL RUNNING IN A SYSTEM 

ENVIRONMENT. 

APKLIM SPECIFIES MAXIMUM LIMIT FOR PEAK NOISE. MAY 

BE CHANGED TO ZERO TO FORCE TYPEOUT OF PEAK 
NOISE ON A CHANNEL RUNNING IN A SYSTEM 

ENVIRONMENT. 

CLSTCH IF SRI BIT1«1, USED TO SPECIFY END CHANNEL 

FOR SAMPLING STABLE INPUT. 

OFFALL IF SRI BIT1«1, USED TO SPECIFY TOLERANCE OF 

STABLE CHANNEL. PRESET BY MODULE TO 

" 000002 ". 

NLSTCH IF SRI BIT2»1, USED TO SPECIFY LAST CHANNEL 

FOR NOISE TESTING. 









* 
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9.0 NON-STANDARD printouts 


1. IF A CHANNEL HAS EXCESSIVE RMS NOISE, IT REPORTS IT IN AN 
ERROR CALL AND A MSGN CALL: 

(EXAMPLE) 

MNCAD (A/D) UNIT #0 ON CHAN 00 

A/D RMS NOISE ■ 0.52 LSB (LIMIT a .20 LSB) 

2. IF A CHANNEL HAS EXCESSIVE PEAK NOISE, IT REPORTS IT IN AN 
ERROR CALL AND A MSGN CALL: 

(EXAMPLE) 

MNCAD (A/D) UNIT #0 ON CHAN 00 

A/D PEAK NOISE ■ 2.57 LSB (LIMIT * 2,00 LSB) 

3. IF THERE IS AN EXCESSIVE AMOUNT OF NOISE SO THAT THE DAC 
CANNOT BE ADJUSTED, IT REPORTS IT IN AN ERROR CALL AND A MSGN 
CALL: 

(EXAMPLE) 

MNCAD (A/D) UNIT #0 

A/D PEAK WRAPAROUND ERROR ON CHAN 00 

4. IF A CHANNEL IS FOUND TO BE UNSTABLE IN STABLE INPUT 
SAMPLEING, IT REPORTS IT IN A MSGN CALL: 

(EXAMPLE) 

A/D ERROR ON CHAN 14? OLD VALUE a 4066 NEW VALUE * 4000 

I 
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ago 0007 



f 



333 


.TITLE MNAA DEC/Xil SYSTEM EXERCISES MODULE 
ODXCOM VERSION 6 23*MA¥«78 

.LIST BIN 


000000 * 


BEGIN | 




000000 * 

047115 040501 

040 MODNAMI 

a ASCII 

/MNAA / 

I MODULE NAME, 

000005 * 

000 

XFLAGi 

.BYTE 

OPEN 

(USED TO KEEP TRACK OF WBUFF USAGE 

000006' 

171000 

ADDRI 

171 000*0 

? 1ST DEVICE ADDR, 

000010' 

000400 

VECTOR 1 

400+0 


> 1ST DEVICE VECTOR. 

000012* 

300 

BR1 1 

.BYTE 

PPTY6+0 

1 1ST BR LEVEL, 

0000 13* 

000 

BR2 1 

.BYTE 

PPTY0+0 

f 2ND BR LEVEL, 

00001 4 * 

000001 

DVID1 1 

0 + 1 


IDEVICE INDICATOR 1, 

@0001 6 ' 

000000 

SRI 1 

OPEN 


j SWITCH REGISTER 1 

000020' 

000000 

SR2I 

OPEN 


1 SWITCH REGISTER 2 

@00022 * 

000000 

8R3J 

OPEN 


1 SWITCH REGISTER 3 

@00024' 

000000 

SR4 1 

OPEN 


1 SWITCH REGISTER 4 



I ####**< 




000026' 

140000 

STATl 

140000 


I STATUS WORD. 

000030' 

000274' 

INITI 

START 


1 MODULE START ADDR, 

000032' 

000224' 

SPOINTI 

MODS? 


IMODULE STACK POINTER. 

000034' 

000000 

PASCNT1 

0 


J PASS COUNTER. 

000036' 

000005 

ICONTl 

9 


1# OF ITERATIONS PER PASSES 

000040' 

000000 

icounti 

0 


ILOC TO COUNT ITERATIONS 

000042 ' 

000000 

SOFCNT1 

0 


(LOG TO SAVE TOTAL SOFT ERRORS 

000044' 

000000 

hrdcnti 

0 


ILOC TO SAVE TOTAL HARD ERRORS 

000046' 

000000 

SOFPASI 

0 


ILOC TO SAVE SOFT ERRORS PER PASS 

0000S0 ' 

000000 

HRDPASI 

0 


ILOC TO SAVE HARD ERRORS PER PASS 

000052 * 

000000 

SYSCNTl 

0 


I# OF SYS ERRORS ACCUMULATED 

000054' 

000000 

RANNUMS 

0 


1 HOLDS RANDOM « WHEN RAND MACRO IS CALLED 

000056' 


CONFIGS 



IRESERVED FOR MONITOR USE 

@00056' 

000000 

RES 1 1 

0 


1 RESERVED FOR MONITOR USE 

000060* 

000000 

RES2I 

0 


IRESERVED FOR MONITOR USE 

000062* 

000000 

SVR01 

OPEN 


ILOC TO SAVE R0 , 

000064* 

000000 

SVRU 

OPEN 


|LOC TO SAVE Rl, 

000066* 

000000 

SVR2I 

OPEN 


ILOC TO SAVE R2 , 

000070* 

000000 

SVR3| 

OPEN 


ILOC TO SAVE R3, 

000072' 

000000 

SVR4 1 

OPEN 


ILOC TO SAVE R4, 

000074' 

000000 

SVR51 

OPEN 


ILOC TO SAVE R5, 

000076' 

000000 

SVR6 1 

OPEN 


ILOC TO SAVE R6. 

000100* 

000000 

CSPAi 

OPEN 


| ADDR OF CURRENT CSR, 

000102* 


SBADR! 



1 ADDR OF GOOD DATA , OR 

000102* 

000000 

ACSRl 

OPEN 


fCONTENTS OF CSR, 

000104* 


WASADRI 



1 ADDR OF BAD DATA, OR 

000104* 

000000 

ASTATl 

OPEN 


ISTATUS REG CONTENTS, 

000106' 


ERRTYPI 



1 TYPE OF ERROR 

000106' 

000000 

ASB t 

OPEN 


I EXPECTED DATA, 

000110* 

000000 

AWASI 

OPEN 


(ACTUAL DATA, 

000112* 

000274' 

PSTRTs 

RESTRT 


(RESTART ADDRESS AFTER END OF PASS 

000114' 

000000 

WDTOl 

OPEN 


1 WORDS TO MEMORY PER ITERATION 

000116' 

000000 

WDFR \ 

OPEN 


1 WORDS FROM MEMORY PER ITERATION 

000120' 

000000 

INTRI 

OPEN 


1# OF INTERRUPTS PER ITERATION 

000122* 

000000 

IDNUMj 

0 


I MODULE IDENTIFICATION NUMBERS® 

000224' 


MODSPj 
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334 |#OPTIONAL USER SUPPLIED VALUES 


335 

000224* 

000000 

CLSTCHt .WORD 

0 


(USER SUPPLIED LAST SAMPLED CH 


336 

000226* 

000002 

OFFALLi .WORD 

2 


(USER SUPPLIED TOLERANCE FOR SAMPLE 


337 

000230* 

000000 

NLSTCHl .WORD 

0 


(USER SUPPLIED LAST NOISE CH. 


338 

000232* 

000062 

ARMLIMI 50. 



IRMS NOISE LIMIT 


339 

000234* 

000310 

APKLIMi 200, 



1 A/D PEAK NOISE LIMIT, 


340 



1# 





341 



(^REGISTER AND 

VECTOR 

ADDRESS 


342 



I# 





343 

000236* 

171000 

ADSRl .WORD 

171000 


(A/D CSR ADDRESS 


344 

000240' 


DACI 





345 

000240' 

171002 

ADBRi .WORD 

171002 


1 DAC (WRITE ONLY) AND BUFFER REG (READ 

ONLY) 

346 








347 



j THE FOLLOWING 

ARE CLOCK ADDRESSES IF A MNCKW EXISTS, 


348 








349 

000242* 

171020 

ASRl .WORD 

171020 


(CLOCK A CSR, 


350 

000244' 

171022 

ABRI .WORD 

171022 


(CLOCK A PRESET BUFFER, 


351 








352 



1 * 





353 



»*FLAGS ( 

, COUNTERS AND 

OTHER REGISTERS 


354 



j# 





355 








356 

000246* 

000000 

WHO | .WORD 

0 


|0«RM3 NOISE, 1®PEAK NOISE 


357 

000250' 

000000 

INTFLGI .WORD 

0 


(USED IN LOGIC TEST TO INDICATE AN A/D 

INTR, 

358 

000252* 

000000 

FRED ) .WORD 

0 


(USED TO HOLD CURRENT DAC VALUE, 


359 

000254* 

000000 

EDGE! .WORD 

0 


(HOLD CURRENT EDGE VALUE, 


360 

000256' 

000000 

TMP| .WORD 

0 


(TEMP WORKING AREA, 


361 

000260' 

000000 

ARMXI .WORD 

0 


(USED TO HOLD RMS NOISE VALUE, 


362 

000262* 

000000 

APKXl .WORD 

0 


(USED TO HOLD A/D PEAK NOISE VALUE , 


363 

000264' 

000000 

NCCHl .WORD 

0 


ICURRENT NOISE CHAN, 


364 

000266* 

000000 

CCH | .WORD 

0 


(CURRENT SAMPLE CHAN. 


365 

000270' 

000001 

TEMPI BIT0 



(CURRENT UNIT BIT 


366 

000272' 

000400 

VECTAD 8 400 



1 A/D VECTOR 
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SEQ 0009 


367 









368 






1# 



369 






} #START®UP AND INITILIZE 

SECTION 

370 






1# 



371 









372 

00027 4 ' 




RESTRT 

1 



373 

00027 4 ' 




START* 




374 









375 

00027 4 ' 

012767 

000001 

177766 

LOOP 1 * 

MOV 

# 1 # TEMP 

(LOAD UNIT BIT 

376 

000302' 

016700 

177500 



MOV 

ADDR#R0 

( GET BASE ADDR OF A/D, 

377 

000306' 

010067 

177724 



MOV 

R0 , ADSR 

* FIX A/D CSR ADDR, 

378 

000312' 

062700 

000002 



ADD 

#2#R0 

1 BUFFER REG®CSR*2, 

379 

000316' 

010067 

177716 



MOV 

R0 , ADBR 

»FIX BUFFER REG ADDR, 

380 

000322' 

016767 

177462 

177742 


MOV 

VECTOR# VECTAD 

(LOAD VECTOR VALUE 

381 

000330' 

005067 

177730 



CLR 

NCCH 

(CLEAR 1ST CHAN, FOR NOISE, 

382 









383 






t a####*##*###*####### 

384 








(CONVERT ARMLIM TO ASCII AND 

385 








(STORE AT DECIM 

386 

000334' 

104421 

000000' 

000232' 


BTODI 

, BEGIN, ARMLIM,DECIM 

387 

000342' 

002600' 







388 







389 









390 

000344' 

116767 

002232 

002451 


MOVB 

DEC IM + 2 # P7 

(NOW WE WILL PUT IT 

391 

000352' 

116767 

002225 

002445 


MOVB 

DECIM+3, P7+2 

(INTO THE ASCII 

392 

000360' 

116767 

002220 

002440 


MOVB 

DEC IM+4 , P7+3 

(MESSAGE THAT WE TYPE OUT, 

393 









394 






* a*#####################*################*###*##*###**###****# 

395 








(CONVERT APKLIM TO ASCII AND 

396 








(STORE AT DECIM 

397 

000366 ® 

104421 

000000' 

000234' 


BTODI 

,begin,apklim,decim 


390 

000374' 

002600' 







399 






t a**######*#*###########*##################*##**###*#*#*#*#*** 

400 









401 

000376' 

116767 

002200 

002431 


MOVB 

DEC IM + 2 » P8 

(NOW WE WILL PUT IT 

402 

000404' 

116767 

002173 

002425 


MOVB 

DEC IM+3 » P8 + 2 

(INTO THE ASCII MESSAGE 

403 

000412' 

116767 

002166 

002420 


MOVB 

DECIM+4#P8+3 

(THAT WE TYPE OUT, 

404 









405 





(LOOP 

TO HERE 

IF MULTIPLE MNCAD ' 

S 

406 





: 

FIX 1 

THE UNIT # FOR THE 

ERROR TYPEOUT 

407 

000420' 

016700 

177644 


LOOP* 

MOV 

TEMP,R0 

(GET CURRENT UNIT 9 

408 

000424' 

005001 




CLR 

R 1 

UNIT VALUE 

409 

000426' 

006200 



IS* 

ASP 

R0 

(MOVE IT 

410 

000430' 

001402 




BEO 

2S 

(BR IF LAST 

411 

000432' 

005201 




INC 

PI 

(UPDATE COUNT 

412 

000434' 

000774 




BR 

IS 


413 

000436' 

062701 

000060 


2$ 1 

ADD 

#60#R1 

(MAKE ASCII VALUE 

414 

415 

000442' 

110167 

002442 



MOVB 

R1 »P10U 

(SAVE IN MESSAGE 
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416 






1* 




417 






(*LOGIC 

TEST #1 



418 






(*IN THIS TEST WE 

WILL 

SEE IF THE A/D RESPONDS TO ITS 

419 






(#ADDR. 

IF NOT, A 

DEC/X11 "SYS ERROR,, WILL OCCUR 

420 






1* 




421 










422 

000446' 

005777 

177564 


LOGl! 

TST 

9ADSR 


(ADDRESS THE A/D 

423 










424 






(* 




425 






(#LOGIC 

TEST #2 



426 






(*IN THIS TEST WE 

WILL 

SEE IF THE CLOCK RESPONDS TO ITS ADDR# ONLY 

427 






(#IF THE CLOCK OPTION 

IS SELECTED BY SRI, 

428 










429 

000452' 




LOG2I 





430 

000452' 

104407 

000000' 



BREAKS, 

BEGIN 


(TEMPORARY RETURN TO MONITOR,,,, 

431 

000456' 

104407 

000000' 



BREAKS, 

BEGIN 


(THEN CONTINUE AT NEXT INSTRUCTION, 

432 

000462' 

032767 

000001 

177326 


BIT 

#BIT0 # SR 1 


(IS CLOCK OPTION SELECTED? 

433 

000470' 

001402 




BEQ 

LOG3 


(BR IF NOT TO NEXT TEST, 

434 










435 

000472' 

005777 

177544 



TST 

0 ASP 


(CLOCK WAS SELECTED# WILL IT RESPOND? 

436 










437 










438 






;*LOGIC 

TEST #3 



439 






J*IN THIS TEST WE 

WILL 

SEE IF THE A/D WILL INTERRUPT, 

440 






1* 




441 

000476' 

005067 

177546 


LOG3I 

CLR 

INTFLG 


(CLEAR A/D DID INTR , FLAG, 

442 

000502' 

012777 

000566' 

177562 


MOV 

# 1 S # 9VECTAD 

(SET UP VECTOR ADDR, 

443 

000510' 

012777 

000101 

177520 


MOV 

#101 , 0ADSR 

(START A CONVERSION, SHOULD INTERRUPT, 

444 









( BEFORE BREAK TIME IS OVER, 

445 










446 

000516' 

104407 

000000' 



BREAKS, 

BEGIN 


(TEMPORARY RETURN TO MONITOR,,,, 

447 

000522' 

104407 

000000' 



BREAKS, 

BEGIN 


(THEN CONTINUE AT NEXT INSTRUCTION, 

448 










449 

000526 ' 

005767 

177516 



TST 

INTFLG 


(DID THE A/D INTERRUPT? 

450 

000532' 

001024 




BNE 

L0G4 


(IF SO, NEXT TE5T 

451 

000534' 

016767 

177476 

177336 


MOV 

ADSR ,CSRA 


(SET ADDR, OF AD CSR FOP ERROR TYPEOUT, 

452 

000542' 

0177S7 

177470 

177332 


MOV 

9ADSR # ACSR 

(RECORD CONTENTS OF CSR, 

453 

000550' 

005077 

177462 



CLR 

9ADSR 


(STOP A/D 

454 







455 

000554 ' 

104405 

000000' 

000000 


HRDEPS, 

BEGIN, NULL 


(A/D FAILED TO INTERRUPT 

456 







457 

000562' 

104410 

000000' 



ENDS, BEGIN 


(DROP MODULE ON THIS FAILURE 

458 










459 






l#A/D SHOULD INTP, 

TO 

HERE, 

460 

000566' 

003077 

177444 


111 

CLR 

f ADSR 


(STOP A/D, 

461 

000572' 

005777 

177442 



TST 

9ADBR 


(CLEAR CSR BIT07, 

462 

000576 ' 

005267 

177446 



INC 

INTFLG 


(INDICATE THAT IT DID INTP, 

463 

000602' 

000002 




RTI 



(EXIT INTR, 
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SEQ 0011 


464 






jaLOGXC T“ST 44 


465 






I^THIS TEST WILL ONLY 

BE DONE IF THE CLOCK OPTION IS SELECTED 

466 






|*IN THIS TEST WE WILL 

SEE IF THE OVERFLOW OF CLOCK 1 WILL 

467 






{^TRIGGER A CONVERSION 

IN THE A/D 

468 






1 * 


469 








470 

000604 s * 

032767 

000001 

177204 

LOG4 1 

BIT #RIT0,SR1 

{IS THE CLOCK OPTION SELECTED? 

471 

000612* 

00 S 446 




BEQ LOGS 

{IF NOT, GOTO NEXT TEST* 

472 








473 

000614' 

012777 

177777 

177422 


MOV 8177777, §ABR 

{PRESET CLOCK FOR ALL ONES, 

474 

000622' 

012777 

000040 

177406 


MOV #BXTS,fADSR 

{SET OVERFLOW ENABLE IN A/D « 

475 

000630' 

012777 

000011 

177404 


MOV «11,«ASR 

{START CLOCK, 1MH2, GO* 

476 

000636' 

005000 




CLR R0 

{SET FOR DELAY LOOP, 

477 








478 

000640* 




1 § I 



479 

000640* 

104407 

000000 ' 



BREAKS, BEGIN 

{TEMPORARY RETURN TO MONITOR, , , , 

480 

000644* 

104407 

000000' 



BREAKS, BEGIN 

{THEN CONTINUE AT NEXT INSTRUCTION, 

481 

000650 * 

105777 

177366 



TSTB ®ASP 

{IS THE CLOCK OVERFLOW SET? 

482 

000654' 

100402 




BMI 2$ 

{ YE5®EXIT LOOP, 

483 

000656* 

105200 




INCB R0 

1 NO , I S DELAY EXCEEDED? 

484 

000660* 

001367 




BNE 1$ 

{ NO*»CONTINUE DELAY, 

485 

000662' 




2$ 1 



486 

000662' 

017767 

177354 

177214 


MOV PASR, ASTAT 

{RECORD CONTENTS OF CLOCK CSR, 

487 

488 

489 

000670* 

005077 

177346 



CLR PASP 

{CLEAR THE CLOCK, 

000674' 

105777 

1 77336 



TSTB PADSR 

{ IS DONE FLAG SET? 

490 

000700' 

100413 




BMI LOG5 

1 IF YES NEXT TEST, 

491 







{IF NOT, ERROR 

492 

000702' 

016767 

1 77330 

177170 


MOV APSP iCSPA 

{RECORD A/D CSR ADDR ® 

493 

000710' 

017767 

177322 

177164 


MOV P ADSR , ACSR 

{RECORD CONTENTS OF A/D CSR, 

494 







495 

000716' 

104405 

000000' 

000000 


HRDERS, BEGIN, NULL 

{CLOCK OVERFLOW FAILED TO TRIGGER A/D CONVERSION 

496 






; a®#*®##*®*#####**# «.#•»#### 

497 








498 







{FOR THIS ERROR YOU MIGHT CHECK 

499 







(TO SEE IF A OVERFLOW IS WIRED TO 

500 







{A/D INPUT, 

501 







{DROP THIS MODULE - FATAL ERROR, 

502 

000724' 

104410 

000000' 



ENDS, BEGIN 

(CAN'T CONTINUE IF OVERFLOW DOESN'T TRIGGER THE CONVERSI 
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505 

506 

507 
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j^LOGIC TEST #5 

}#XN THIS TEST WE CHECK THAT WHEN CHANNEL 0 IS CONVERTED 
;#WITH THE MAINTENANCE BIT SET THE RESULT IS 0 


508 

509 

000730' 

000730* 

104407 

000000' 


510 

000734* 

104407 

000000' 


511 

000740* 

005777 

177274 


512 

000744' 

012777 

001014' 

177320 

513 

000752' 

012777 

000105 

177256 

514 

000760' 

104400 

000000' 


515 

000764' 

005777 

177250 


516 

517 

518 

519 

000770' 

000772' 

001414 

016767 

177240 

177100 

520 

001000* 

017767 

177232 

177074 

521 

522 

001006' 

104405 

000000' 

000000 

523 

524 

525 

526 

527 

528 

001014' 

001014* 

000004 

000000* 

000764 


BREAKS, BEGIN 
BREAKS, BEGIN 
TST RADBR 

MOV # 2 $ » @ VECTAD 

MOV # 1 05 , ® ADSR 

EXITS, BEGIN 
TST RADBR 


f TEMPORARY RETURN TO MONITOR,, », 

{THEN CONTINUE AT NEXT INSTRUCTION* 

I FALSE READ OF A/D BUFFER 
{ SET UP INTERRUPT VECTOR 
{START A/D WITH MAINTENANCE SET 

{EXIT TO MONITOR, MODULE WAIT FOR INTERRUPT, 
{TEST FOR ALL 0'S RESULT 
{NOTEt INTERRUPT SERVICE WILL 
{BEGIN USING HERE AFTER A PIRQ, 

BEQ LOGS {IF RESULT IS ALL 0'S, GOTO NEXT TEST 

MOV ADSR,CSPA {RECORD A/D CSR ADDRESS 

MOV RADSR , ACSR {RECORD CONTENTS OF A/D CSR 

HRDERS, BEGIN, NULL {FAILED TO GET ALL 0'S RESULT FROM CONVERSION 

J »■»■&•» ■&■»## 

j#A/D INTERRUPTS TO HERE 


PIRQ8, BEGIN, 1$ 


{ QUEUE UP TO CONTINUE AT IS AND RTI 


529 

530 

531 

532 

533 


{ tfLOGIC TEST #6 

;*IN THIS TEST WE CHECK THAT WHEN CHANNEL 1 IS CONVERTED 


534 

535 

536 






}#WITH 

THE MAINTENANCE 

BIT SET THE RESULT IS 7777 


001022' 

012777 

001074' 

177242 

L0G6 ! 

MOV 

#2^ # IVECTAD 

{SET UP INTERRUPT VECTOR 


537 

001030' 

012777 

000505 

177200 


MOV 

#505 , 9ADSR 

{START A/D WITH MAINTENANCE SET 


538 

001036' 

104400 

000000 ' 



EXITS, 

BEGIN 

{EXIT TO MONITOR, MODULE 

WAIT FOR INTERRUPT 

539 

001042' 

022777 

007777 

177170 

m 

CMP 

#7777, § ADBP 

(TEST FOR ALL 1*S RESULT 


540 

001050' 

001414 




BEQ 

LOG? 

JIF RESULT IS ALL 1*5/ GOTO NEXT 

TEST 

541 

001052' 

016767 

177160 

177020 


MOV 

ADSB ,CSFA 

{RECORD A/D CSR ADDRESS 


542 

001060' 

@17767 

177152 

177014 


MOV 

RADSR , ACSR 

{RECORD CONTENTS OF A/D CSR 


543 






( #***««»#*###« *$«£#»#«****»*<»*»#»«**«****•»«#««****»« 

544 

001066* 

104405 

000000' 

000000 


HRDER$ 

, BEGIN, NULL 

{FAILED TO GET ALL 1 'S RESULT FROM CONVERSION 

545 






{■ft####®#®#®*##®#®*#®®##®#®®®®#®#®®®®®®®®®#®#®®®#®#®##®#®#® ####•## 

546 






{ ® A/D 

INTERRUPTS TO HERE 


547 

§48 

001074* 




2$ 1 





549 

550 

001074' 

000004 

000000* 

001042* 


PIRQS, 

s 

BEGIN, 1$ 

? QUEUE UP TO CONTINUE AT 18 AND 

RTI 
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SSI 





1* 




552 





S&L06IC TEST #7 



353 





MIN THIS TEST Mg MILL 

SAMPLE ALL CHANNELS SELECTED 


554 





S&FOR 

TEST AND STORE AWAY THEIR RESULTS g 


sss 









556 

001102* 



LOO? | 





537 

001102* 104407 

000000 s 



BREAK! 

1 BEGIN 

J TEMPORARY RETURN TO MONITOR, , « « 


538 

001106 s 104407 

000000 * 



BREAKS 

, BEGIN 

ITHEN CONTINUE AT NEXT INSTRUCTION, 

539 

001112 s 012777 

000200 

177120 


MOV 

#200,§ADBR 

8 LOAD CORRECTION DAC 


360 

001120 s 005777 

177114 



TS? 

RADBR 

jFALSE READ OF A/D BUFFER. 


561 

001124* 003077 

177106 



CLR 

fADSR 

1 CLEAR A/D s S CSR 


362 

001130 s 005067 

177132 



CLR 

CCH 

S START ON CH # 0, 


563 

001134 s 012777 

001262 s 

177130 


MOV 

# 4$ , IVECYAD 

fSEf UP INTR e VECTOR® 


564 









§65 

001142 s 012700 

177770 


IS? 

MOV 

#«»§, »R0 

f SET TO DO 8 CONVERSIONS, 


566 

001146 s 003001 




CLR 

PI 

f R 1 WILL CONTAIN SUM OF CONVERSIONS , 

567 

001150* 016767 

177112 

177100 


MOV 

CCH # TMP 

1 GET CM * NUMBER « 


560 

001156 s 000367 

177074 



SWAB 

TMP 

8 PUT IN CORRECT CSR POSITION , 


369 

001162 s 0S2757 

000101 

177066 


BIS 

#BIT6|SIT0,TMP 

f ADD INTR, ENABLE AND GO. 


§70 

001170 s 016777 

177062 

177040 

2!s 

MOV 

TMP.IADSR 

t START A/Da 


571 

001176 s 104400 

000000 s 



EXIT!, 

BEGIN 

? EXIT TO MONITOR , MODULE 

WAIT FOR 

572 

001202 s 



30 8 





573 

001202 s 067701 

177032 



ADD 

MDBR # R 1 

} SUM THIS RESULT , 


574 







8 NOTE INTR SERVICE WILL 


573 







SEEING USE HERE AFTER A PIRG 


576 

001206 s 0052S0 




INC 

R0 

> DONE 8 CONVERSIONS? 


577 

001210 s 100767 




BMI 

2% 

INO • DO ANOTHER ONE® 


578 









579 

001212 s 006201 




ASH 

PI 

t NOW WE MUST 


580 

001214 s 006201 




&SR 

PI 

S CALCULATE THE AVERAGE 


381 

001216 s 006201 




ASR 

PI 

SOF THE SAMPLES THAT 


382 

001220 s 005501 




ADC 

PI 

S WE JUST TOOK, 


583 

001222 s 016702 

177040 



MOV 

CCH,R2 

f PICK UP ch 8 number. 


504 

001226 s 006302 




ASL 

R2 

I USE IT AS AN OFFSET, 


585 

001230 s 010162 

003162 s 



MOV 

PS , RECSAM ( 2 } 

I STORE THIS AVERAGE, 


586 









587 

001234 s 005267 

177026 



INC 

CCH 

f UPDATE CH s NUMBER, 


588 

001240 s 026767 

177022 

176762 


CMp 

CCHfNLSTCH 

IDONE ALL NOISE CHANNELS? 


389 

001246 s 003735 




BLE 

1$ 

f NO®DO NEXT ONE, 


390 

001250 s 026767 

177012 

176746 


CMP 

CCH.CLSTCH 

IDONE ALL STABLE CHS? 


591 

001256 s 003731 




BLE 

1! 

| NO ®DO NEXT ONE. 


592 

001260 s 000403 




BR 

REST® 

?YES«GOfO NOISE TESTS, 


593 









594 









395 





S®A/D 

INTERRUPTS TO HERE 


596 









597 

001262 s 



41 1 





599 

001262 s 000004 

000000* 

001202 s 


PXRQI, 

BEGIN, 3 $ 

5 QUEUE UP TO CONTINUE AT 38 AND 

PTI 

601 





1 »®® «8® 





SE@ Mil 
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SEQ 0014 


602 

001270 s 005077 

176742 


PEST08 

CLR 

9ADSR 

jCLEAR A/D s S CSR, 

603 

001274 s 016700 

176772 



MOV 

VECTAD # R0 

1 SET VECTOR AND PSW 

604 

001300 s 012720 

002262 s 



MOV 

#WAINT, (R0)+ 

f LOAD INTR, ADDR, INTO VECTOR ADDR , 

603 

001304 s 116710 

176502 



MOVB 

BR1#(R0) 

1 LOAD PRIORITY 

606 

001310 s 005067 

176730 



CLR 

NCCH 

1 IN IT THE CHANNEL » 

607 

608 
609 




jCALCULATE A/D 

RMS NOISE USING 

VERNIER DAC « 

001314 s 012700 

000657 


ADRMS1I 

MOV 

8431, f P0 

1 R0 « 84,13% OF 512 CONVERSIONS 

610 

001320 s 016767 

176740 

176730 


MOV 

NCCH , TMP 

I GET THE CHAN « 

611 

001326 s 000367 

176724 



SWAB 

TMP 

SPUT IN PROPER CSR POSITION, 

612 

001332 s 052767 

000100 

176716 


BIS 

#100, TMP 

I ADD INTR, ENABLE, 

613 

001340 s 016701 

176720 



MOV 

NCCH, PI 

j PICK UP CH, NUMBER, 

614 

001344 s 006301 




ASL 

PI 

1 FORM AN OFFSET, 

615 

001346 s 016167 

003162 s 

176700 


MOV 

PECSAM(R1),EDGE 

1 GET EDGE VALUE FOR THIS CH, 

616 

001354 s 005267 

176666 



INC 

WWO 

IXNDICATE RMS NOISE TEST, 

617 

001360 s 016777 

176672 

176650 


MOV 

TMP , §ADSR 

|CH a #0, AND INTERRUPT ENABLE 

618 

001366 s 016701 

176646 



MOV 

D AC , R 1 

IRI 8 ADDRESS OF SAR DAC 

619 

001372 s 004767 

000552 



JSP 

PC, SAP 

> GET DAC VALUE THAT PRODUCES 16/84 SPLIT 

620 

001376 s 016705 

176650 



MOV 

FRED ,R5 

ISAVE LEFT BOUNDARY 

621 

001402 s 012700 

000121 



MOV 

#81 , ,R0 

|R0 ® 15,87% OF 512 CONVERSIONS 

622 

001406 s 004767 

000536 



JSR 

PC, SAP 

1 GET DAC VALUE THAT PRODUCES 84/16 SPLIT 

623 

001412 s 166705 

176634 



SUB 

FRED , R5 

jR5 ■ BREADTH OF NOISE 9 68% AREA 

624 

001416 s 010567 

176636 



MOV 

R5 , ARMX 

f SAVE FOR DAC NOISE CALCULATIONS 

625 

001422 s 020567 

176604 



CMP 

R5 , ARMLXM 

|< OR a RMS LIMIT? 

626 

001426 s 003410 




BLE 

ADPK1 

1 IF WITHIN LIMIT THEN CONTINUE AT ADRMS2 

627 

001430 s 004767 

001052 



JSR 

PC , EPCOM 

j GET ERROR PARAMETERS 

628 







J ERROR PARAMETERS LOADED BY "ERCOM" 


629 


S a################# 


630 

001434 s 

104405 

000000 s 

000000 

HPDERg 

.BEGIN, NULL 

j | RMS NOISE ERROR-SEE NEXT TYPEOUT 

631 






632 

001442 s 

104403 

000000 s 

002606 s 

MSGNS, 

BEGIN, MSGl 

j A SC 1 1 MESSAGE CALL WITH COMMON HEADER 

633 





jCALCULATE A/D 

PEAK NOISE USING 

VERNIER DAC, 

634 

635 

001450 s 

012700 

000775 


ADPKli MOV 

#509, ,R0 

IFOR EAK OF 2 1/2 SIGMA 

636 

001454 s 

016767 

176604 

176574 

MOV 

NCCH# TMP 

? GET CHAN , NUMBER, 

637 

001462 s 

000367 

176570 


SWAB 

TMP 

j PUT IN CORRECT CSR POSITION, 

638 

001466 s 

052767 

000 1 00 

176562 

BIS 

#100, TMP 

JADD INTR 8 ENABLE 

639 

001474 s 

003067 

176346 


CLR 

WHO 

IXNDICATE PEAK NOISE TEST, 

640 

001500 s 

016777 

176552 

176330 

MOV 

TMPjIADSR 

ich,and interrupt enable, and CH 

6*1 

001506 s 

016701 

176526 


MOV 

DAC , R| 

yRl ■ ADDRESS OF SAR DAC 

642 

001512 s 

004767 

000432 


JSR 

PC, SAR 

1 GET DAC VALUE THAT GIVES ,6% LOW COUNT 

643 

001516 s 

016705 

176530 


MOV 

FRED ? R5 

IRS ■ LEFT BOUNDARY 

644 

001522 s 

012700 

000003 


MOV 

# 3 , R0 

ICHANGE SPLIT FOR RIGHT BOUNDARY 

645 

001526 s 

004767 

000416 


JSP 

PC, SAR 

?GET DAC VALUE THAT GIVES ,6% HIGH COUNT 

646 

001532 s 

166703 

176514 


SUB 

FRED ,R5 

SR§ ■ A/D PEAK TO PEAK NOISE 

647 

001536 s 

010567 

176320 


MOV 

R5,APKX 

ISAVE FOR DAC NOISE CALCULATIONS 

648 

001542 s 

020567 

176466 


CMP 

R5 , APKLXM 

y< OR ■ A/D PEAK NOISE LIMIT? 

649 

001546 s 

003410 



BLE 

ENDP 

S BRANCH IF NO ERROR 

650 

001550 s 

004767 

000732 


JSR 

PC , ERCOM 

1 GET ERROR PARAMETERS 

631 







f ERROR PARAMETERS LOADED BY "ERCOM" 

652 






633 

001354 s 

104405 

000000 s 

000000 

HRDERI 

.BEGIN, NULL 

SfPEAK NOISE ERROR®SEE NEXT TYPE OUT 

654 






6S5 

001362 s 

104403 

000000 s 

002630 s 

MBGNJ, 

BEGIN, MSG3 

(ASCII MESSAGE CALL WITH COMMON HEADER 



MNAA DEC/Xli SYSTEM EXERCISER MODULE 
XMN&A0 eH 1 19-FEB-79 11*17 


MACYI1 30AC1032) |9-FEi-»?9 Ul32 PAGE 16 


SEQ 0015 


656 

001570' 

032767 

000004 

176220 

ENDPf 

BIT 

#BIT2»SR! 

65? 

001576' 

001411 




BEQ 

31 

658 

001600' 

000402 




BR 

21 

659 

001602' 

000167 

177506 


ill 

JMP 

ADRMS1 

660 

001606' 

005267 

176452 


211 

INC 

NCCH 

661 

001612' 

026767 

176446 

176410 


CMP 

NCCH,NLSTCH 

662 

001620' 

101770 




BLOS 

IS 

663 





S BX NOW 

the program has run 

664 

001622' 

032767 

000002 

176166 

311 

BIT 

#BITl »SRi 

665 

001630' 

001510 




BEQ 

EENDP 

666 

001632' 

005067 

176430 



CLR 

CCH 

667 





? VOLTAGE SAMPLING HAS BEEN i 

668 

001636' 

026767 

176424 

176360 

4*1 

CMP 

CCH,CLSTCH 

669 

001644' 

003102 




BGT 

EENDP 

670 

00 1 646 ' 

005003 




CLR 

R3 

671 

001650' 

012700 

000010 



MOV 

# 8 » , R0 

672 

001654' 

012777 

001704' 

176410 


MOV 

#66 , @VECTAD 

673 

001662' 

016701 

176400 



MOV 

CCH, Pi 

674 

001666' 

000301 




SWAB 

R 1 

675 

001670' 

052701 

000101 



BIS 

#101, Ri 

676 

001674' 

010177 

176336 


SSI 

MOV 

R 1 , <? ADSR 

677 

001700' 

104400 

000000' 



EXITS, 

BEGIN 

678 

001704' 




661 



679 






!•■•••■ 


680 

001704' 

000004 

000000' 

001712' 


PIRQg, 

BEGIN, 76 

681 






!-•••• 


682 








683 

001712' 

067703 

176322 


7 1 1 

ADD 

® ADBR , R 3 


5 DOING MULTIPLE NOISE CHANNELS? 

I NO • BYPASS 

I NO DO AGAIN, 

{POINT TO NEXT CH, 

{EXCEED LAST NOISE CH? 

I NO®TEST THIS CH a 

LOGIC AND NOISE TESTS ON ALL SELECTED CHANNELS ON THI 
JAPE WE DOING VOLTAGE SAMPLING? 
j NO - END PASS 1 
$ YES - START WITH CH 0, 

LED — NOW TEST IF BEFORE REPORTING EOP 
JDONE ALL CHANNELS? 

{ YES <* REPORT END PASS „ 

I R3 WILL HOLD SAMPLE, 

J SET TO TAKE 0 SAMPLES 
{SET VECTOR FOR INTERRUPT 
{GET CH, NUMBER 
{FIX RIGHT POSITION IN CSR, 

{ADD INTR, ENABLE AND GO, 

{START A/D, 

{EXIT TO MONITOR, MODULE WAIT FOR INTERRUPT, 


| QUEUE UP TO CONTINUE AT 7S AND RTI 


684 

685 

686 

687 

688 

689 

690 

691 

692 

693 

694 

695 

696 

697 

698 

699 

700 

701 

702 

703 

704 

705 

706 

707 

708 

709 

710 

711 


001716* 

001720' 

001722' 

001724' 

001726' 

001730' 

001732' 

001736' 

001740' 

001742' 

001746' 

001750' 

001752' 

001756' 


005300 

001365 

006203 

006203 

006203 

005503 

016700 

006300 

010301 

166003 


1 

005403 

020367 

003431 


001760' 104420 
001766' 003402' 


176330 

003162' 

176250 

000000' 000266' 


DEC 

BNE 

ASR 

ASP 

ASR 

ADC 

MOV 

ASL 

MOV 

SUB 

BPL 

NEG 

CMP 

BLE 


R0 

5S 

R3 
R3 
R3 
R 3 

CCH# R0 
R0 

R3,R1 

PECSAMCR0) #P3 

80 
R 3 

R3 , OFFALL 
103 


{ADD THIS SAMPLE TO TOTAL 
{ALL DONE ALL SAMPLES? 

{NO • DO NEXT ONE, 

{ YES NOW WE 
{MUST DIVIDE BY 
,8 TO GET THE 
{SAMPLE AVERAGE, 

{NOW GET CH, NUMBER 
{FORM AN OFFSET 
{SAVE NEW SAMPLE VALUE, 

{GET THE DIFFERENCE BETWEEN 
{AND THE NEW ONE WE JUST GOT 
I IF POSITIVE WE'RE OK, 
{OTHERWISE MAKE IT POSTIVE, 
{IS IT WITHIN TOLERANCE? 

{YES DO NEXT CH 


001770' 016067 003162' 


{CONVERT CCH TO ASCII AND 
{STORE AT CHANN 

OTOA3, BEGIN, CCH, CHANN 

J ####* «■ ««••&&#### ft########## 

MOV REC SAM (R0), OLDS {GET OLD VALUE 

j #$####*»####««### »##«##«**«#******«*« #*«#»****«***##*****#»*»** 

{CONVERT OLDS TO ASCII AND 
(STORE AT OLDS 
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712 

713 

714 

715 

716 

717 

718 

719 


001776* 
002004 ® 


104420 

003362' 


002006* 010167 
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OTOAI, BEGIN, OLDS, OLDS 

j <&*«•##$»•■»•& # a a 

MOV R 1 , NEWS (GET NEW VALUE 

{CONVERT NEWS TO ASCII AND 
{STORE AT NEWS 


SEQ 0016 


720 

002012' 104420 

000000' 

003372' 


OTOA8, 

BEGIN, NEWS, NEWS 


721 

002020* 003372' 







722 





j ###«•&####&#& ##*########## 

723 








724 

002022' 010160 

003162' 



MOV 

R 1 , RECS AM ( R0 ) 

{PUT NEW INTO OLD, 

725 








726 





1 **#»*««* tf******«*ft**tt#*ft*##«**«##»***««*##tt*****#*****tt******** 

727 

002026' 104405 

000000* 

000000 


HRDEP $ 

, BEGIN, NULL 

(REPORT NEW VALUE EXCEEDS THE ALLOWED TOLERANCE 

728 





1 ■#&■»*•#•» a#### a######### ■&#### a####*####*###**### 

729 

002034' 104403 

000000' 

002672' 


MSGNg, 

BEGIN, MSG12 

{ASCII MESSAGE CALL WITH COMMON HEADER 

730 








731 

002042' 005267 

176220 


1031 

INC 

CCH 

(LOOK AT NEXT CHAN, 

732 

002046' 000167 

177564 



JMP 

4 3 

(GO TEST IT 

733 








734 

002052' 032767 

000001 

173736 

EENDP I 

BIT 

#BIT0,SR1 

(TEST IF MNCKW ENABLED 

735 

002060* 001025 




BNE 

IS 

(BR IF YES «DO NOT DO MULTIPLE UNITS> 

736 

002062' 006367 

176202 



ASL 

TEMP 

{MOVE OVER 

737 

001066' 022767 

000020 

176174 


CMP 

#BIT4 , TEMP 

(TEST IF MAX, UNIT 

738 

002074' 001417 




BEQ 

IS 

}BR IF MAX 

739 

002076' 036767 

176166 

173710 


BIT 

TEMP , DVID 1 

(TEST IF SELECTED 

740 

002104' 001413 




BEQ 

IS 

(BR IF NOT 

741 

002106' 062767 

000004 

176122 


ADD 

# 4 , ADSR 

(UPDATE ADDRESS 

742 

002114' 062767 

000004 

176116 


ADD 

# 4 » ADBR 


743 

002122' 062767 

000010 

176142 


ADD 

# 10, VECTAD 

(UPDATE VECTOR 

744 

002130' 000167 

176264 



JMP 

LOOP 

(LOOP AND TEST NEXT UNIT 

745 

002134' 005067 

176124 


ids 

CLR 

NCCH 

(INIT THE CHANNEL « 

746 

002140* 104413 

000000* 



ENDITS 

, BEGIN 

{SIGNAL END OF ITERATION, 

747 







(MONITOR SHALL TEST END OF PASS 

748 

002144' 000167 

176124 



JMP 

RESTRT 


749 








730 




(USING 

SUCCESSIVE APPROXIMATION 

AND VERNIER DAC DEFINED IN Rl, 

751 








752 

002150' 012702 

000200 


SARI 

MOV 

#200, R2 

|R2 ■ MSB OF DAC 

753 

002154' 003011 




CLR 

(PI) 

(GET RID OF 'ONES' 

734 

002136' 005067 

176070 



CLR 

FRED 

{START WITH ZERO DAC 

755 

002162' 060267 

176064 


BIT 1 

ADD 

F2 , FRED 

(TRY THIS BIT 

756 

@02166 ' 016711 

176060 



MOV 

FRED, CPI) 

(LOAD DAC, 

757 

@02172' 00S003 




CLR 

R3 

(INIT HIGH COUNT 

738 

002174' 012704 

001000 



MOV 

#512,, P4 

JR4 8 # OF SAMPLES IN A BURST 

759 

002200' 



CONVI 




760 








761 

002200' 032767 

000001 

175610 


BIT 

#BIT0, SRI 

(IS CLOCK SELECTED? 

762 

002206 ' 001004 




BNE 

13 

J YES GOTO HANDLER, 

763 








764 

@02210' @52777 

000001 

176020 


BIS 

#BIT0,*ADSR 

(NO - SET GO BIT IN A/D, 

763 

@02216' @00420 




BR 

2S 

(GOTO 23 

766 








767 

@02220' @04767 

@00172 


ill 

JSR 

PC, RANDY 

{GET A RANDOM NUMBER, 



aee 0017 


mum DEC/X11 SYSTEM EXERCISER MODULE MACY11 30AC1032) 19®FEB®79 11132 PAGE 1® 


XMNAA0 s 

,PU 1? 

l-FEB-79 

11817 






768 

002224 s * 

005077 

176012 



CLP 

f ASR 

j MAKE SURE THE CLOCK'S CSR IS CLEAR , 

769 

002230* 

052767 

177770 

000242 


BIS 

#177770, RNA 

f MAKE SURE Of HIGH NUMBER, 

770 

002236* 

016777 

000236 

176000 


MOV 

SRNA, ®ABR 

I SET CLOCK PRESET REG, 

771 

002244* 

052777 

000040 

175764 


BIS 

#BXT5 s> 9ADSR 

? SET OVERFLOW ENABLE, 

772 

002252* 

012777 

000011 

175762 


MOV 

# i 1 , ®ASR 

} START CLOCK 

773 

002260* 




218 




774 

002260* 

104400 




EXIT! 


jRETURN TO MONITOR, 

775 

002262* 




WAXNTS 













777 

002262* 

000004 

000000* 

002270* 


PIRQ8# 

BEGIN, 1$ 

I QUEUE UP TO CONTINUE AT 1$ AND RTI 

778 









779 

002270* 

027767 

175744 

175756 

1S8 

CMP 

IADBR, EDGE 

j> OR b EDGE? 

780 

002276* 

133401 




BLO 

2$ 

IBRANCH IF «EDGE 

781 

002300* 

005203 




INC 

R3 

j COUNT IF > OR ®EDGE 

782 

002302* 

005304 



231 

DEC 

B4 

icqunt through BURST 

783 

002304* 

001335 




BNE 

CONV 

1 BRANCH IF NOT DONE 

784 

002306* 

020300 




CMP 

R3#R0 

JHIGH COUNT > % OF 512 CONVERSIONS? 

785 

002310* 

003402 




BLE 

33 

1 BRANCH TO LAVE BIT IN 

786 

002312* 

160267 

175734 



SUB 

R2 , FRED 

HAKE BIT OUT 

787 

002316* 

006202 



311 

ASR 

R2 

I NEXT BIT 

788 

002320' 

001320 




BNE 

BIT 

JAND GO RESOLVE IT IF NOT DONE 

789 

002322* 

005767 

175724 



TST 

FRED 

f CHECK FOR ALL 'ZEROES ' 

790 

002328* 

001405 




BEQ 

WRPERR 

IBRANCH IF INVALID RESULT 

791 

002330* 

026727 

175716 

000377 


CMP 

FRED, #377 

ICHECK FOR ALL 'ONES * 

792 

002336* 

001401 




BEQ 

WRPERR 

IBRANCH IF INVALID RESULT 

793 

002340* 

000207 




RTS 

PC 

IRETURN TO ADRMS1 OR ADPKl , 

794 





SVOLTAGE needed to produce 8 of 

HIGH COUNTS SPECIFIED IS OUT OF THE 

795 





I RANGE 

OF THE 

WRAPAROUND DAC a 


796 





iCLEAR 

INTERRUPTS* PRINT MESSAGE 

1 AND DROP MODULE, 

797 

798 

002342* 

005077 

175670 


WRPERRl 

CLR 

8ADSR 

1 STOP A/D 

799 

002346* 

004767 

000134 



JSR 

PC f ERCOM 

1 GET ERROR PARAMETERS 

800 








jERROR PARAMETERS LOADED BY "ERCOM" 

801 







802 

002352* 

104405 

000000 * 

000000 


HRDERI 

, BEGIN, NULL 

1 j NOISE TEST WRAPAROUND ERROR 

803 







804 

002360* 

005767 

175662 



TST 

WHO 

I SEE WHICH TEST WE WERE DOING, 

805 

002364* 

001004 




BNE 

18 

I WHO® 1 THEN RMS NOISE TESTe 

806 

002366* 

104403 

000000* 

002652* 


MSGN®, 

BEGIN, MSGil 

lASCII MESSAGE CALL WITH COMMON HEADER 

807 

002374* 

000403 




BP 

28 

f GO AHEAD, 

808 

002376* 




ill 




809 

002376* 

104403 

000000* 

002716* 


MSGN®, 

BEGIN, MSG13 

I ASC I I MESSAGE CALL WITH COMMON HEADER 

8ie 

002404* 

00S267 

175440 


28! 

INC 

HRDPAS 

I UPDATE THE ERROR COUNT, 

811 

002410* 

005726 




TST 

( SP ) + 

fRESTORE STACK FROM THE JSR PC THAT 

812 








IGOT US TO "SAR", 

813 

002412' 

000167 

177152 



JMp 

FNDP 

> GET NEXT DIRECTIVE , 
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SEQ 0018 


814 





; GENERATE A RANDOM NUMBER 


815 

816 

002416* 

066767 

000060 

000054 

RANDY | 

ADD 

FNB,RNA 

jTHESE FOLLOW SEQUENCE OF 

817 

002424* 

066767 

000054 

000046 


ADD 

RNC»RNA 

1 INSTRUCTIONS GENERATE 

818 

002432* 

005587 

000042 



ADC 

RNA 

I A RANDOM NUMBER 

819 

002436* 

066767 

000036 

000036 


ADD 

BN A , RNB 

I TO BE USED 

820 

002444* 

066767 

000034 

000030 


ADD 

RNC , RNB 

1 TO BE LOADED 

821 

002452* 

005567 

000024 



ADC 

RNB 

| INTO THE CLOCK'S PRESET 

822 

002456* 

066767 

000016 

000020 


ADD 

RNA, RNC 

I BUFFER, IF SELECTED FOR TEST, 

823 

002464* 

066767 

000012 

000012 


ADD 

RNB, RNC 

} ONLY RANA WILL BE USED, 

824 

002472* 

005567 

000006 



ADC 

RNC 


825 

002476' 

000207 




RTS 

PC 

IRETURN TO "CONV" 

826 

002500* 

063241 



PNAl 

063241 


IRANDOM TO NUMBER A, 

827 

002502* 

142315 



PNBI 

142315 


IRANDOM NUMBER B, 

828 

002504* 

127623 



PNC I 

127623 


jRANDOM NUMBER C, 

829 









830 






jCONVERT NOISE RESULT TO 

DECIMAL 

8 31 
832 

002506* 

016767 

175524 

175364 

ERCOM | 

MOV 

ADSR ,CSRA 

I LOAD HEADER FOR ERRORN CALL 

033 

002514* 

017767 

175516 

175360 


MOV 

RADSRr ACSR 


834 

002522' 

016767 

175300 

175354 


MOV 

STAT, ASTAT 


835 

002530* 

010567 

000044 



MOV 

R5 , DEC IM 

ISTACK BINARY NOISE VALUE 

836 






» a######################*##########*###*####*##*#####***##*##* 

837 








ICONVERT DECIM TO ASCII AND 

838 








{STORE AT DECIM 

839 

002534' 

104421 

000000* 

002600* 


BTODI, 

BEGIN, DECIM,DECIM 


840 

002542* 

002600* 







841 






I*##*######*######***##*#*###*######*####*##*##*#**##**##***## 

842 

002544* 

116767 

000032 

000363 


MOVB 

DECIM+2#VALUE 

1 MOVE CONVERTED VALUES TO ASCII BUFFER 

843 

002552* 

116767 

000025 

000337 


MOVB 

DECIM+3,VALUE+2 

IFOR TYPEOUT OF ERROR 

844 

002560' 

116767 

000020 

000352 


MOVB 

DECIM+4,VALUE+3 

1 ON RETURN 

345 







846 








ICONVERT NCCH TO ASCII AND 

847 








ISTORE AT CHANN 

848 

002566* 

104420 

000000* 

000264* 


OTOA8, 

BEGIN, NCCH,CHANN 


849 

002574* 

003402* 







850 







851 

002576* 

000207 




RTS 

PC 

1 EXIT TO CALLER, 

852 

@53 

002600* 

000003 



DECIMi 

,BLKW 

3 






MNA& D EC/Si 1 SYSTEM EXERCISER MODULE 
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SEQ 0019 


854 

855 

856 

002606' 

003065' 

MSG1 s 

) ASCII MESSAGES 

P10 

857 

002610' 002744' 


P2 

858 

002612' 003406' 


CHANN+4 

859 

002614' 

002736' 


PI 

860 

002616' 002775' 


P4 

881 

002620' 003011' 


P6 

862 

002622' 003135' 


VALUE 

863 

002624' 003023' 


P7 

864 

002626' 

177777 


“1 

865 

866 

002630' 003065' 

MSGS X 

P10 

867 

002632' 002744' 


P2 

868 

002634' 003406' 


CHANN+4 

869 

002636' 

002736' 


PI 

870 

002640' 003003' 


P5 

871 

002642' 003011' 


P6 

872 

002644' 003135' 


VALUE 

873 

002646' 003035' 


P8 

874 

002650' 177777 


»l 

875 

876 

002652' 003065' 

MSG 1 1 j 

P10 

877 

002654' 

002736' 


PI 

878 

002656' 003003' 


P5 

879 

002660' 003113' 


P 1 3 

380 

002662' 003127' 


P 1 5 

381 

002664' 002744' 


P2 

882 

002666' 003406' 


CHANN+4 

883 

002670' 177777 


-1 

834 

885 

002672' 

003065' 

MSG 1 2 1 

P 1 0 

886 

002674' 002736' 


PI 

887 

002676' 

003127' 


Pi 5 

088 

002700' 

002744' 


P2 

339 

002702' 003406' 


CHANN+4 

890 

002704' 002756' 


P3 

891 

002706' 003364' 


OLDS+2 

892 

002710' 003047' 


P9 

893 

002712' 003374' 


NEWS+2 

894 

002714' 177777 


“1 

895 

896 

002716' 

003065' 

MSG13I 

P 1 0 

897 

002720' 002736' 


PI 

898 

002722' 002775' 


P4 

899 

002724' 003113' 


Pi 3 

900 

002726' 003127' 


Pi 5 

901 

002730' 

002744' 


P2 

902 

002732' 003406' 


CHANN+4 

903 

002734' 177777 


-1 


AND POINTERS 

f UNIT # 

J ON CHAN 

f (CHAN NUMBER 2 DIGITS) 

I % A/D 
) RMS 
t NOISE b 

I (CONVERTED BELOW) X,XX LSB (LIMIT ss 

I 0*50 LSB) "THIS VALUE WILL CHANGE IF OPERATOR CHANGES 
) MESSAGE TERMINATOR* 

jUNIT # 

> ON CHAN 

t (CHAN NUMBER 2 DIGITS) 
t % A/D 
f PEAK 
f NOISE ■ 

t (CONVERTED VALUE) X*XX LSB (LIMIT a 

» 2,00 LSB) "THIS VALUE WILL CHANGE IF OPERATOR CHANGES 
| MESSAGE TERMINATOR 

lUNIT « 

1 % A/D 
J PEAK 

I WRAPAROUND 

> ERROR 

» ON CHAN 

! (CHAN NUMBER 2 DIGITS) 

) MESSAGE TERMINATOR 

JUNIT # 

> % A/D 
t ERROR 

I ON CHAN 

\ (CHAN NUMBER 2 DIGITS) 

I I OLD VALUE s 
t "A/D READING 4 DIGITS 
I NEW VALUE ■ 

j "NEW A/D READING 4 DIGITS 
» MESSAGE TERMINATOR* 

J UN IT # 

I % A/D 

> RMS 

I WRAPAROUND 

> ERROR 

J ON CHAN 

l (CHAN NUMBER 2 DIGITS) 
t MESSAGE TERMINATOR, 


MNAA DEC/Xli SYSTEM EXERCISER MODULE MACY11 30A(1052) 19-FEB-79 11132 PAGE 21 
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904 

002736' 040445 

042057 

000040 

Pll 

.ASCIZ 

905 

002744' 047440 

020116 

044103 

P21 

* ASCIZ 

906 

002752' 047101 

000040 




907 

002756' 020073 

046117 

020104 

P3l 

.ASCIZ 

908 

002764' 040526 

052514 

020105 



909 

002772' 020075 

000 




910 

002775' 122 

051515 

000040 

P4 1 

.ASCIZ 

911 

003002' 000 




.BYTE 

912 

003003' 120 

040505 

020113 

P5 1 

.ASCIZ 

913 

003010' 000 





914 

003011' 116 

044517 

042523 

P6l 

.ASCIZ 

915 

003016' 036440 

000040 




916 

003022' 000 




.BYTE 

917 

003023' 060 

032456 

020060 

P 7 * 

.ASCIZ 

918 

003030' 051514 

024502 

000 



919 

003035' 062 

030056 

020060 

P8 | 

.ASCIZ 

920 

003042' 051514 

024502 

000 



921 






922 

003047' 040 

042516 

020127 

P9 | 

.ASCIZ 

923 

003054' 040526 

052514 

020105 



924 

003062' 020075 

000 




925 

003065' 045 

047115 

040503 

P 1 0 1 

.ASCII 

926 

003072' 020104 

040450 

042057 



927 

003100' 020051 

047125 

052111 



928 

003106' 021440 





929 

003110' 060 

040 

000 

P10UI 

.BYTE 

930 

003113' 127 

040522 

040520 

P 1 3 l 

.ASCIZ 

931 

003120' 047522 

047125 

020104 



932 

003126' 000 





933 

003127' 105 

051122 

051117 

P 1 5 « 

.ASCIZ 

934 

003134' 000 





935 






936 

003135' 130 

054056 

020130 

VALUE I 

s ASCIZ 

937 

003142' 051514 

020102 

046050 



938 

003150' 046511 

052111 

036440 



939 

003156' 000040 





940 

003160' 000 




.BYTE 

941 






942 

003162' 




.EVEN 

943 

003162' 000100 



RECSAMI 

. BLKW 

944 






945 

003362' 000003 



OLDSl 

. BLKW 

946 

003370' 000000 




.WORD 

947 

003372' 000003 



NEWS! 

.BLKW 

948 

003400' 000000 




.WORD 

949 

003402' 000003 



CHANNg 

.BLKW 

950 

003410* 000000 




.WORD 

951 

000001 




.END 


'%A/D ' 

' ON CHAN ' 

'} OLD VALUE * ' 

'RMS ' 

'PEAK ' 

'NOISE a ' 

'0,50 LSB)' 

'2.00 LSB)' 

' NEW VALUE s ' 

'%MNCAD (A/D) UNIT #' 

60 » 40# 0 
'WRAPAROUND ' 

'ERROR' 

'X,XX LSB (LIMIT a ' 

64* fUSED TO STORE A/D RESULTS ON UP TO 64, CHANS 

3 j USED FOR STORE OF ASCII OF OLD SAMPLE VALUE* 

0 

3 fUSED FOR STORE OF ASCII NEW SAMPLE VALUE* 

0 

3 fUSED FOR STORAGE OF ASCII OF CHAN, NUMBER* 

0 


SEQ 0020 



MNAA DEC/X11 SYSTEM 

EXERCISER 1 

MODULE 

MACYU 

$0k(l0B2) 

19-FI 

XMNAA0 8 PI1 19®F£B 

*79 11117 


CROSS REFERENCE 

TABLE ■ 

ABR 000244R 

310# 

473# 

770* 



ACSR 000102R 

320# 

432* 

493* 

520* 

542# 

ADBR 000240R 

345# 

379* 

461 

511 

515 

ADDR 000006R 

286# 

376 




ADDR22® 001000 

333# 





ADPK1 001450R 

626 

6 33 # 




ADRMS1 001314R 

609# 

659 




ADSR 000236R 

343# 

377* 

422 

443* 

451 


319 

520 

537* 

541 

542 


771# 

798* 

832 

833 


APKLIM 000234R 

139# 

397 

641 



APKX ©00262R 

362# 

647* 




ARMLIM ©00232R 

338# 

386 

625 



ARMX 000260R 

361# 

624* 




AS1 000106R 

324# 





ASR 000242R 

349# 

435 

475* 

481 

486 

ASTAT 000104R 

322# 

486* 

834* 



AWAS 0001 10R 

325# 





BEGIN 000000R 

283# 

386 

397 

430 

431 


309 

510 

514 

522 

520 


632 

633 

655 

677 

630 


806 

809 

839 

848 


BIT 002162R 

735# 

788 




BIT© a 000001 

333# 

365 

432 

470 

569 

BIT! a 000002 

333# 

664 




BXT10 ■ 002000 

333# 





BIT i i a 004000 

333# 





BIT12 a 010000 

333# 





BIT 1 3 » 020000 

333# 





BIT! 4 h 040000 

333# 





BIT 1 5 a 100000 

333# 





8IT2 a 000004 

333# 

656 




BIT3 a 000010 

333# 





BXT4 ® 000020 

333# 

737 




BITS s 000040 

333# 

474 

771 



BITS ® 000100 

333# 

569 




BIT7 a 000200 

333# 





BITS s 000400 

333# 





BIT9 a 001000 

333# 





BREAK!® 104407 

333# 

430 

431 

446 

447 

BRi 0000I2R 

288# 

605 




BR2 000013R 

289# 





BTODi a 104421 

333# 

386 

397 

839 


CCH 000266R 

364# 

562* 

567 

583 

587* 

CDATAga 104412 

333# 





CHANN 003402P 

704 

848 

858 

868 

882 

CLSTCH 000224P 

335# 

590 

668 



CONFIG 000056P 

308# 





CONV 002200P 

759# 

783 




CSRA 000100P 

318# 

451* 

492* 

519* 

541# 

DAC 000240P 

344# 

618 

641 



DATCKS® 104411 

333# 





DATEPga 104404 

333# 





DECIM 002600P 

386 

390 

391 

392 

397 


85 3 # 





DVID1 000014R 

290# 

739 





MNAA DEC/X11 SYSTEM 

EXERCISEP ! 

MODULE 

MACY11 

30AC1052) 

19-1 

XMNAA0 e P 1 1 i 9®FEB 

®79 11817 


CROSS : 

REFERENCE 

TABLE 

EDGE 000254P 

359# 

615* 

779 



EENDP 002052P 

665 

669 

734# 



ENDITS® 104413 

333# 

746 




ENDP 001570P 

649 

656# 

813 



ENDS a 104410 

333# 

457 

502 



ERCOM 002506P 

627 

650 

799 

832# 


ERRTYP 000106P 

323# 





EXITS a 104400 

33 3 # 

514 

538 

571 

677 

FRED 000252P 

358# 

620 

623 

643 

646 

GETPAg® 104415 

333# 





GWBUF$s§ 10441 4 

333# 





HRDCNT 000044R 

303# 





HRDERga 104405 

333# 

455 

495 

522 

544 

HRDPAS 000050R 

305# 

810* 




ICON! 000036P 

300# 





ICOUNT 000040R 

301# 





IDNUM 000122R 

330# 





INIT 000030R 

297# 





INTFLG 000250R 

357# 

441* 

449 

462* 


INTR 000120R 

329# 





LOG1 000446R 

422# 





LOG2 000452R 

429# 





LOG3 000476R 

433 

441# 




L0G4 000604P 

450 

470# 




LOGS 000730R 

471 

490 

508# 



LOG6 001022P 

518 

536# 




LOG? 001102R 

540 

556# 




LOOP 000420R 

407# 

744 




LOOP1 000274R 

375# 





MAP228® 104416 

333# 





MODNAM 000000P 

284# 





MODSP 000224P 

298 

331# 




MSGNg a 104403 

333# 

632 

655 

729 

806 

MSGSS a 104402 

333# 





MSGS « 104401 

333# 





MSG! 002606R 

632 

856# 




MSG 1 1 002652R 

806 

876# 




M3G12 002672R 

729 

885# 




MSG13 002716R 

809 

896# 




MSGS 002630P 

655 

866# 




NCCH 000264R 

363# 

301* 

606* 

610 

613 

NEWS 003372R 

716* 

720 

893 

947# 


NLSTCH 000230R 

337# 

588 

661 



NULL ■ 000000 

333# 

455 

495 

522 

344 

OFFALL 000226R 

336# 

698 




OLDS 003362R 

708* 

712 

891 

949# 


OPEN ■ @00000 

285 

291 

292 

293 

294 


320 

322 

324 

325 

327 

OTOAS * 104410 

333# 

704 

712 

720 

848 

PASCNT 000034R 

299# 





PXRQg a 000004 

333# 

528 

549 

599 

680 

POPSP a 005726 

333# 





PGPSP2® 022626 

333# 





PRTY a 000000 

333# 





PRTY0 a 000000 

219 

333# 




PRTY1 a 000040 

333# 
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USER SYMBOLS SEQ ©011 

833 # 


539 

559* 

560 

973 

613 

742* 

779 


452 

561* 

493* 

570* 

460* 

802* 

474* 

617* 

489 

640* 

492 

676* 

493 

741* 

513* 

764* 


487* 

768* 

772* 






446 

447 

455 

457 

479 

480 

499 

§02 

938 

544 

549 

557 

558 

971 

599 

630 

704 

712 

720 

727 

729 

746 

777 

802 

734 

761 

764 







479 

480 

309 

510 

557 

358 



588 

590 

666* 

668 

673 

691 

704 

731* 

889 

902 

949# 






832* 








401 

402 

403 

835* 

839 

842 

843 

844 
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USER SYMBOLS SEQ 0022 

774 

754# 755# 756 786# 789 791 

630 653 727 802 


809 


636 

660* 

661 

745* 

848 




630 

653 

727 

802 





311 

328 

312 

329 

313 

333# 

314 

315 

316 

317 

318 


777 
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PRTY2 a 

000100 

333# 


PRTY3 a 

000140 

333# 


PRTY4 ■ 

000200 

333# 


PRTY5 * 

000240 

333# 


PRTY6 a 

000300 

288 

333# 

PRTY7 a 

000340 

333# 


PS a 

177776 

333# 


P5W a 

177776 

333# 


PUSH a 

005746 

333# 


PUSH2 a 

024646 

333# 


PI 

002736R 

859 

869 

P10 

00306SR 

856 

366 

P10U 

003110R 

414# 

929# 

Pi 3 

003113R 

879 

399 

PIS 

003127R 

880 

087 

P2 

002744R 

857 

867 

P3 

002756R 

890 

907# 

P4 

00277SR 

860 

398 

P5 

003003P 

870 

878 

P6 

00301 1R 

861 

871 

P7 

003023R 

390# 

391# 

P8 

003035R 

401# 

402# 

P9 

003047R 

892 

922# 

RANDY 

002416R 

767 

816# 

RANDI a 

104417 

333# 


RANNUM 

0000S4R 

307# 


RECSAM 

003162P 

585# 

615 

RESTRT 

000274R 

326 

372# 

REST0 

001270R 

592 

602# 

RES1 

000056R 

309# 


RES2 

000060R 

310# 


RNA 

002500P 

769# 

770 

RNB 

002S02R 

816 

819# 

RNC 

002504R 

817 

820 

RSTRT 

000112P 

326# 


SAR 

0021S0R 

619 

622 

SBADR 

000102R 

319# 


SOFCNT 

000042R 

302# 


SOFER$® 

104406 

333# 


SOFPAS 

000046R 

304# 


SPOINT 

000032R 

298# 


SPSIZ s 

000040 

1# 

331 

SRI 

0000 1 6p 

291# 

432 

SR2 

000020R 

292# 


SRI 

000022R 

293# 


SR4 

000024R 

294# 


START 

000274R 

297 

373# 

STAT 

000026R 

296# 

834 

SVP0 

000062R 

311# 


SVR1 

000064R 

312# 


SVR2 

000066R 

313# 


SVR3 

000070R 

314# 


SVR4 

000072P 

315# 


SVRS 

000074R 

316# 


SVR6 

000076R 

317# 


SYSCNT 

0000S2R 

306# 



077 

886 

897 

904# 

876 

885 

896 

925# 

930# 

900 

881 

933# 

S88 

901 

905# 

910# 

912# 

914# 

392# 

863 

917# 


403# 

873 

919# 



694 

708 

724# 

943# 

748 





016# 

820# 

822# 

817# 

821# 

823# 

010# 

823 

824# 

819 

827# 

828# 

822 

826# 

642 

645 

752# 




470 

656 

664 

734 

761 



SEQ 0031 
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XMNAA0, 

Pll 1 9=>FEB»79 

11117 


CROSS ! 

REFERENCE 

TABLE »» 

USER < 

SYMBOLS 





SEQ 0024 

TEMP 

000270R 

365 # 

375# 

407 

736# 

737 

739 







TMP 

000236R 

360# 

567# 

568# 

569# 

570 

610# 

611# 

612# 

617 

636# 

637# 

638# 640 

TRPDFDs 

000022 

333# 












VALUE 

003135R 

842# 

843# 

844# 

862 

872 

936# 







VECTAD 

000272R 

366# 

380# 

442# 

512# 

536# 

563# 

603 

672# 

743# 




VECTOR 

000010P 

287 # 

380 











WAINT 

002262R 

604 

775# 











WASADR 

000104R 

321# 












WDFR 

000116R 

328 # 












WDTO 

0001 14R 

327 # 












WHO 

000246R 

356# 

616# 

639# 

804 









WRPERR 

002342P 

790 

792 

798# 










XFLAG 

000005R 

285# 












e a 

003412R 

853# 

942# 

943# 

945# 

947# 

949# 








» ABS s 000000 000 

003412 001 


ERRORS DETECTED | 0 

DEFAULT GLOBALS GENERATEDl 0 

XMNAA0» XMNAA0/SOL/CRF i SYMaDDXCOM , XMNAA0 
RUN»TIMEJ 2 2 ,3 SECONDS 
RUNTIME PATIO I 147/3826.8 
CORE USED! 7K (13 PAGES) 



